home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen… 1994 February Supplement / ARPL-Feb-94-Supplement-PowerPC.iso / 3rd Party PowerPC Demo Apps / Aldus FreeHand / Aldus FreeHand 4.0 TV / Aldus FreeHand 4.0 TV.rsrc / Post_1093 < prev    next >
Encoding:
Text File  |  1994-01-25  |  510 b   |  35 lines
  1. /setgray{pop 1 _setgray}bdf
  2. /setcmykcolor{
  3.  overprintcmyk
  4.  pop pop pop 1 exch sub _setgray
  5. }bdf
  6. /maxcolor { 
  7.  pop pop pop  
  8. } bdf
  9. /colorimage{
  10.  pop pop
  11.  [
  12. 5 -1 roll 
  13. /exec cvx 
  14. 6 -1 roll
  15. /exec cvx 
  16. 7 -1 roll
  17. /exec cvx 
  18. 8 -1 roll
  19. /exec cvx 
  20. /pop cvx
  21. /pop cvx
  22. /pop cvx
  23.  ]
  24.  cvx 
  25.  {1.0 exch sub} bind currenttransfer concatprocs st
  26.  _image
  27. }bdf
  28. /image{
  29.  3 1 getprocessoverprint  
  30.  {gsave nulldevice _image grestore}
  31.  {inverted?{{pop 0}}{{pop 1}}ifelse st _image}
  32.  ifelse
  33. }bdf
  34. /setcolortransfer{pop pop pop st}bdf